    
x = readtable('coeffs.xlsx','Range','B2:D9');

lower = table2array(x(:,1));
coeff = table2array(x(:,2));
upper = table2array(x(:,3));

    time = [-4:-2,0:4];
    
    
    figure;
    s1 = scatter(time,coeff,'o','b');
    axis([-5 5 -0.13 0.022])
    hline = refline([0 0]);
    hline.Color = 'black';
    line([-4, -4],[lower(1) upper(1)],'Color','red')
    line([-3, -3],[lower(2) upper(2)],'Color','red')
    line([-2, -2],[lower(3) upper(3)],'Color','red')
    line([-1, -1],[-0.13 0.03],'Color','black','LineStyle','--')
    line([0, 0],[lower(4) upper(4)],'Color','red')
    line([1, 1],[lower(5) upper(5)],'Color','red')
    line([2, 2],[lower(6) upper(6)],'Color','red')
    line([3, 3],[lower(7) upper(7)],'Color','red')
    line([4, 4],[lower(8) upper(8)],'Color','red')
    ylabel('\textbf{Response of lending to monetary policy}','Interpreter','latex','FontSize',10)
    xlabel('\textbf{Years relative to deregulation}','Interpreter','latex','FontSize',10)
    xticks([-4 -3 -2 -1 0 1 2 3 4])
    xticklabels({'<-3','-3','-2','-1','0','1','2','3','>3'})

    
    